
OUTPUT TO c:\a.txt .                           
       
    
FOR EACH pt_ NO-LOCK WHERE pt_prod_line = "164" ,
    EACH sct_det NO-LOCK WHERE sct_part = pt_part AND sct_sim = "2005-12S" AND sct_site = "530" 
    WITH STREAM-IO WIDTH 220 FRAME a :

    DISP sct_part pt_desc1 sct_cst_tot sct_mtl_ll sct_lbr_tl sct_bdn_tl WITH FRAME a .


    FOR EACH pc_mstr NO-LOCK WHERE pc_part = REPLACE(pt_part, "H", "") AND (pc_start = ? OR pc_start <= DATE(12,31,2005))
        AND (pc_expire = ? OR pc_expire >= DATE(12,31,2005)) BREAK BY pc_start :
    
        IF LAST-OF(pc_start) THEN
            DISP pc_amt[1] WITH FRAME a .
    END.

END.
